Hokke ROU BUY ON EPSOM Pagid 0 dee 


If your group club whatever receives our newsletter and c 
twenty printers, you may send me your order along with a cashi | 
money order and I will hav l ef your printers shipped to one local address, 
Please note, onlw Bucks e uenti or more printers can be shipped to a locatio 


"^ 


other than oum groupe 


a 


“ye 


PURCHASE WILL BE MACE OH OR ABOUT JULY 19, i332 


P 


For Atari 400/900 computers, vou must have the following in order to use 
the Mx-80 printer parallel porto: | 


i Atari 400 or S300 
a= Atari S50 interface module or other parallel-port device, 
For Atari 400/800 computers, vou should order: 


1- Eps EY HE -Ri Feint er ? i t 3 3 i 1 Pot a ic 1 1 t 4 f? 8$ 3-3 i i ^ t : $3595 Li a 
a= Cable “unless you can build vour own? ....... $ 29 


— 2 TOTAL CESSARE, Set peni ae erc tig, üü 
Qptional “allows printing graphics on MR-80a: 
A m GBraphtrax ROM 3 3 1 : H Ei I 1 1 t t $ 3 à ot t. 2 tor 1 1 1 x as 8 i 3 2 i i $ 1 i $ 0 t 


S, TOTAL oto a te x4 $434. nn 


For those of vou who ace Buying the Mx-S0 for use on a computer other 
than the Atari, vou may need one of the following: 


"v, 


d-— HPIB £IEEE-4285 Interface card ......... $ 50,00 
ge Rogge Interface card without buffer» .. $ 69,00 
ew RL232 Interface card with 2k buffer? ..  #120,006 
£* HPI Gable tspecify connectorsg5 orars: S 20.00 
p ESZ3Z cable Cspecify connectors? ....... $ Z0.00 
ee Ib ee eg a eo ee ee es $ 29,00 


HOTE: IF vou intend to use the Graftrax FOMs with an R5232 interface, 
Wok must purchase the RZZSZ interface with the 2K buffer. 

Make checks ay ARES ATARI USERS GROUF, 

Mail tao: 
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John Crane 

oane Texas Court 

San doze, Ca 935120 
£d15595,7-6590 - days 
L408 a265-P 31% - eves 





Latest information on the Leading Edge 
disk drive for the ATARI, came recently in the 
mail, The Smalls are extending the User Group 
discount price until the end of September. Until 
that time the Leading Edge Disk System with 
one 3.25 disk drive will be $870, Further, add 
on, units are $350 each. ( À $300 deposit is 
required with your order, rest COD, ) This 
includes the following standard equipment: 
l.command center with motherboard, 
ZDiskmaster IZII controller. 3. OS T-card 
module. 4, one 5.25 disk drive. 5. cable and two 
connectors, & A/C adapter, 


The standard features are increased data 
transfer rate ( up to 7 times faster ), 6 slot 
expandability, single/double density, software 
compatible, intelligent controller, and easy 
installation. (note the attached drawing, which 
seems to indicate that the unit attaches in 
place of the ATARI top cover. Might make it 
difficult to fit into a computer organizer or 
desk, ) 


Another accessory that many of you may be 


interested in is the controller series being 
introduced by the WICO Company. They are — — 





producers of coin-op controllers, and are 
introducing, yes you quessed it, a trackball and 
two joysticks. The Track ball is reported to 
work very well, and the joysticks look qreat, 
They each feature a larqe ‘bat’ shaped handle 
with both a thumb fire button and one on the 
base in the usual location. The two joy-sticks 
are $29,975 and $39,975 respectively, The more 
expensive one is heavier and has qold contacts, 
etc, The trackball is $69,?5, This latter sounds 
a little high to me, but I have no idea how a 
trackball works, so it remains to be seen if they 
will become available for less. The trackball is 
definitely a superior control device to the 
joystick. (turn the trackball over and you have a 
larger version of Xerox’s ‘mouse’ ) These are 
supposed to be available by November, 


New prices on the ATARI 400! E29 9 
retail, less, discounted. This puts the 400 in an 
excellent competitive position, and makes it a 
very qood choice for any use that doesn't 
include a lot of keyboard work. ( like a BBS 
machine ) 


That brings up the subject of BB5's, At the 
July meeting, Andy Soderberq, is going to 
present our group with the opportunity to take 
over the ATARI BBS that he has been running in 
his office, and is qoing to move to his home, It 
has no official connection to ATARI, he has 
been running it as a hobby and to help Earl Rice 
and the user group support folks, to work out 
the bugs in the proqram; I've talked to Andy 
about it and he has an attractive offer to make 
at the meeting, 


We've also talked to Bill Wilkinson, and he ` 
has aqreed to come to the Dysan meetinq and 
describe and give to the library the proqram he 
published in Compute, to redefine the keys of 


" the ATARI to any keystroke sequence. You can 


Store up ta 9799 key definition masks on disk, 
and recall them. This allows you to define, for 
instance, the CTRL L as your ID code for 
logging onto a BBS or Time share system, 
another as your name, etc., etc. 


This allows a lot of time saved in losts of © 
commonly done operations. Another obvious use 


would be to define keys as commonly used 
BASIC commands, like ^L for LIST, ^B for DOS, 





^R for RUN, etc. 


JULY MEETINGS 


The first July meeting will be on July 12th, 
rather than July Sth, to allow our members to 
avail themselves of the long holiday. It will be 
at Dysan as usual, and will feature 
presentations by Andy Soderberq, of ATARI, 
and Bill Wilkinson, of Optimized Systems 
Software. Andy will be describing the history 
of the MACE BBS software that he has been 
polishing and making a proposal for the club to 
establish a BBS. Bill will be describing and 
explaining his "SOFTKEY programe. 


The second meeting will be on the 3rd 
Tuesday, July 20th, at Software City, 106 El 
Paseo de Saratoga, at the intersection of 
Saratoga and Campbell Ave.s in San Jose. Both 
meetings are at 7 P.M. 











FROM THE | 
EDITOR 


In her editorial of July 1981 Liza Loop 
addressed the subject of BURNOUT, In addition 
to his numerous duties as the groups chief 
officer, Dave Flory has been producing this 
newsletter since her resignation. It might be 
that his profession has made him mare resistant 
than athers to the disease, but I would tend to 
credit his sheer dedication to BAUG. So as I am 
taking over this part of the load, I would like to 
express my deep appreciation for the job he has 
done, 


Qur next edition will be solely produced 
by the new editorial staff ( which is still in its 
formative stage ), and we would like to take 
this column to quickly outline our approach for 
those of you that were not able to attend the 

mid-month meeting. 


| This news letter has the potential to be 
an extremely useful medium for our group. Its 
original purpose, the dissemination of 
information about the club, will be filled by a 
special column or page with announcements, a 
club calendar, and, we hope, a column detailing 
the events transpiring during our meetings. The 
various officers (e.g librarians ) will have 
opportunity to highlight the activities in their 
respective departments. 


There have been a number of very good 
articles of educational nature about the ATARI 
system. We would like to enhance this direction, 
and we will try to generate a number of regular 
columns addressing particular subject areas. A 
few volunteers already expressed an interest, 
and we have confidence that with increasing 
membership the variety of possible columns will 
be substantial. 


With increased size the cost of producing 
this letter will not stay the same, and it will 
become very desirable to attract advertisement, 
But with this we encounter our CATCH-22, only 
consistent quality and appearance will make our 
paper an attractive medium for advertisement, 





So eventually we will look for a more 
sophisticated graphic appearance and wider 
distribution as revenue is enhanced. If we can 


distribute a considerable number of sample 


copies at participating dealers, we can reach a 
substantially wider audience of newcomers to 
the field of home computing, attracting a wider 
club membership. 


Lofty goals indeed, especially if we 
review the level of participation Dave 


‘experienced while producing the paper. But it 


appears, our work will not be carried on 
singular shoulders. At this time our staff 
consists of four. Frank Guiterrez will head the 
editorial department Graphics and Games, Tene 
Kember will especially support the field of 
EDUCATION, and will also function as 
advertising manager, Gail Pagget volunteered to 
work on circulation. Of course, allof us will 
share the load of physically producing the paper 


with any other idealist we can find. 


If you would like to participate, you can 
do so on a number of levels. The least committal 
is to contribute an article, program, or just 
ideas. If you feel uncomfortable with writing, 
we will certainly help and try to give your 
master piece that ‘little edge’ (in fact, we 
already had a volunteer 'ghost writer' at the 
last meeting » The next level is to agree to 
write a regular column on any subject you like, 
or no subject in particular. But we will have a 
deadline, and need your contribution before that 
to meet our publishing date. But if you really 
feel the urge to experience the excitement of 
journalism, you can become a staff member on 
the news letter. The staff will meet about twice 
a month (atleast), there will be one planning 
session, and, of course, the final lay-out. 
Heading an editorial department will involve 
writing your own column, feature articles, and 
editing the contributions in your particular area. 


We foresee the actual experience to be 
very exciting, a sizable number of participants 
will lessen the load on individual shoulders, and 
it will make your newsletter dynamic and good 
reading. 


If you would like to get involved, or have 
any questions, please talk to me after the 


regular meetings, or give me a call. 


Harald Striepe 


C) FORTH 


ok Especially with the arrival of 
fig-FORTH in the BAUG club library, the 
interest of budding programmers in this unique 
language appears to be on the increase, I 
started programming in Forth only a few months 
ago, originally with the purchase of QS-Forth 
produced by Quality Software, but while the 
aura and concept initially caught my fancy, the 
unfamiliar structure soon built walls around its 
real features, It languished on my disk, while I 
fancifully courted the O55 EASMD to reach the 
secret world of COLLEEN, 

But after having sampled the intial bitter 
delicacy, I remained tempted to gain a taste of 
Forth's real flavor, and continued to dabble 
when I was in need of a rest from ASSEMBLY. 
fig-FORTH 1.4 was announced, and its features 
were too tempting to pass up. As a beginner, 
its screen editor appeared the most confusing, 
the stack display was great, but could not be 
turned off once engaged, and once in a while I 
lost track of what base I was using at the time. 
So I decided to change it, and have not had a 
proper night of sleep since. 

It is hard to analyze the exact reason for 
Forth's addictiveness, but I think it derives 
from the close interaction between the 
programmer and the computer that Forth affords 
unlike any other language, coupled with its 
considerable power. It can be used both on a 
primitive as well as sophisticated level, like a 
real language, it grows with you. Leo Brodie's 
STARTING FORTH is an excellent text, 
together with the documentation supplied by QS 
with its Forth version I struggled through the 
initial growing stages ( there also were a few 
phone calls to Rabin and John, after hours of 
vain struggle ) and there still is a way to gos 
But it resulted in the idea for a column for all of 
you, who might want to share a taste without 
having to invest any money ( but you do need a 
system with at least one drive ). 

n FORTH will be a column for 
the beginning Forth user written by an almost 
beginner. It will be an active experience, you 


will read it while exercising with your computer. 
I promise, it will be easy, 

By the time you read this, fig-FORTH 
1,58 should be completed and in the hands of our 
Forth librarian Dave, It will be a standardized 
version specifically for this column, so make a 
backup, if you want to make any changes. 
However, be aware that you cannot use any 
standard DOS utilities to copy these disk, since 
their storage allocation and access mode is 
completely different from the ATARI FMS file 
structure. You can use a sector by sector copier 
(YOUNG, ARCHIVE etc), or simpler, boot up 
fig~FORTH 1,58, and type A LOAD after the oK 
prompt. Give the command BACKUP, and follow 
the instructions. The disk should be formatted. 
If you want to format from fig-Forth1,58, type 
SYS and follow the menu. It is best to 


 write-protect your original disk before doing 


anything with it, 80, I hope you will be ready 
for me next time, but be advised, you must be 
adult enough to deal with the ferocious dangers 
of possible addiction to this language, in other 
words, a stronger man then me... 


Mote for the more experienced! 


fig-FORTH 1,58 is a continuation of the 


multiple efforts of many; who have already 
worked on this particular model, It is available 
fully compiled, or in KERNEL form with all 
source screens supplied ( one screen loads all) 
The KERNEL does contain the ASSEMBLER and 
some other words. Features of 1,58 are a 
switchable stack display ( STACKON, 
STACKOFF ) with the border indicating the base, 
an enhanced screen editor graphically offsetting 
the edit and command areas, indicator of 
screen# and section being edited, fast, single 
letter command words, a key trap to prevent the 
dreaded accidental CR while editing the screen 
(if it is working in time... ) multiple screen 
copies, single drive DUPSCREEN ( same 
comment ), and more. All source screens will be 
on disk. The PHYSOFF is at HEX 10, so your 
old screens will have to be moved with COPIES, 

e O oF 


Harald Striepe 
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MYOPIA 


. Here's a program to display filesfor 
those of you who have a little trouble 
seeing the little print -- or to scroll 
a message across the screen for a demo 
or an announcement, It was downloaded 
from Compuserve's public ACCESS are 


enm 
p 


— 


DIM TEXT$(124) 


DIM DISF$(224) 
DIM FSPECE (14) 


. 7 "ENTER FILESFEC "::INFUT FSPEC$ 
OFEN $2,4,0,F5PEC$ 
FOKE. 75 12.91. m 
SETCOLOR 7 oe 41 SETCOLOR P e 41? 19 1? 
TRAF 1000 

WO=40 . 

REM 

INFUT #2,TEXTS 

FOKE 77,0 

L=LEN(TEXT$) 

IF t=0 THEN 70 


FOR I=1 TO L438:1DISP$(I,IO)s" "NEXT I 


22 IF L=0 THEN 70 
25 FOR K=1 TO L 


DISFS(K KO =TEXTS(K,K) 

NEXT K 

FOR K=i TO L+2 

POSITION 1,5 

? #6;DISP$(K,K+18) 

IF K=1 THEN FOR W=1 TO 160:NEXT W 
FOR W=1 TO WOSNEXT W 


IF STICK(0)=11 THEN WO0=WO-1 
IF STICK (0) =7 THEN WO=WO0+1 
NEXT K 

REM 

GOTO 66 — 


0 CLOSE $2:GRAFHICS O0:END 





SELECT-BACKGROUND 


anemia M 


coto 


START=TOGGLE Saas es dpt SAVE SCREEN 


Included -in this issue is a nice little 
Program which draws in qraphics S8 using Z 


.. calors and providing. a third when the first two 


are used together, It is from the Fresno Atari 
qroup’s newsletter. I modified it to run under 
Basic A+ so that I could use it’s elegantly 
simple joystick routines, (line 110), I also added 
the capability to select the background color 


 yOu wish. Try different colors here and watch 


the changes they make in the artifact colors 
with which you draw. [ if you don’t have Basic 
A+ you have to substitute the following lines! 


100 P= STICK(ONIF P=14 THEN ica IHRETURN - 


110 IF P-6 THEN Y-Y-iiX- X*11RETURN.- 


120 IF P=7 THEN X-X*15RETURN 

130 IF P-5 THEN X-X*1!Y-Y4*1:!RETURN 
140 IF Pz13 THEN Y=VY+i!RETURN 

150 IF P=9 THEN XsX-1!Y-Y41!RETURN 
160 IF Pz11 THEN X-X-1!RETURN 
170 IF Pz10 THEN X-X-1!Y-Y- -ifRETURN 
180 IF Pz15 THEN RETURN 

190 RETURN 


In pss 1020 change it to! 
(+ line Jone) 

1020 RECADR-PEEK(S604255XPEEK 641) 
‘REC LEN=7680 


The sections starting at lines 1000, 2000, 
and 30000 are fast subroutines for saving and 
loading a screen of qraphics in any araphics 
mode. (would need some changes to handle 9,10, 
& 11) The machine language routine should be 
usable unchanged, ( oh yes, I had to move the 
machine language ta make it work in å+, For 
BASIC it was supposed to be loaded from 1534 
to 1595, I haven't tried it in BASIC but it | 
should work the way it is in the listing. If you 
change the starting address to 1536 then change 
lines 1040 and 2080 so the USR call parameters 
read 1334 and 1540, respectively.) 


Dave Flory 


10 GOSUE 30000:REM INITIALIZE SCREEN SAVE/LOAD ROUTINE 

20 DIM A$CIO,QSCIO,FILSCIZ0:30$-CHR$CLSSO GOTO 200 

100 TF X2318 THEN X-1:REM KEEF CURSOR 

101 IF X<1 THEN X-z318:REM FROM GOING 

102 TF Yel THEN Y=158 REM OUT OF BOUNDS 

104 TF Y2158 THEN Y=0iREM AVOID ERRORS 

110 X=X+HSTICK (C023 ¥=Y-VSTICK(CO) RETURN {REM THIS LINE TS JOYSTICK MOVE ROUTINE 
200 GRAPHICS BIFCKE 709,14:PFOÜKE 710,128:PFO0KE 712,128:PFO0KE 752,12 REM DRAW FICT. 
210 ? CHR CL 259%? "Type <Y¥>, <<RETURN: to load a screen.";2INFUT A$ 

eeQ IF A$-"Y" THEN GOSUE LOQOQtTFOKE 752,1 pe 

230 Xz160:Ys80:REM SET STARTING FOINT TO CENTER OF SCREEN 

240 ? t? "START=TOGGLE COLORXOFTION=SAVE SCREEN"??? "SELECTzZBACKGEROUND. COLOR" 
250 COLOR 1:FLOT 0,03DRAWTO 319,0: DRAWTO 319,159: DRAWTO 0,159 $5 DRAWTO 0,0 

260 GOSUE 100:2$C-1:$COLOR C | 

270 IF STRIG(0)=0 THEN C-Z2COLOR C3REM COLOR 2 TO ERASE FOINTS DRAWN 

2800 IF PEEKCS3279)=6 THEN GCOSUB 3000 : 

290 IF FEEKCS32790-3 THEN 2000 
295 IF PEEHKCSO3Z279)-5 THEN 3100 


— uL ERE. AAE 
CES Gea 


300 IF C=2 THEN PLOT X Y GOTO 260 = 

310 YF Cg AND F=0 THEN FLOT XINTOX/220Xx2,Y:G0T0 260 KE 

320 TF Cz22 AND Fel THEN FLOT INTOX/2ÓoX2*1,Y$G0T1T0 260 SS 

999 REM SCREEN LOAD ROUTINE ? 

i000 ? CHRE (125); Enter Name of File to Losed":? "i.e.---Difilenaenme.exit---"ilWFUT 
FILE i 

1010 IF FIL£$(01,20z-2"Di" AND FILS$GL,20z2"C$" THEN 100 

1020 RECADEZDFEEKOS6020RECLEN-Z/69090 

1030 TRAP 1080:0PEN $1,4,0,FIL$ 

1040 INPUT $1,HD,COLT,COLZ,COL3,CO0L 4 : 7 

1050 GRAPHICS MDiPFOKE 708,COLItPFOKE 709,COLZ£PFOKE 710,COL3:POKE 712,CO0L4:FOKE 75 

2,1 | 3 p ud dares sau r any 

1060 A«USRCLÓ36, 1, RECADR,RECLEN) 

1070 CLOSE FI RETURN : IU 
1080 CLOSE FL ERINT CHRS$CCZ3530;CHR$CZO3):CHRS$CLZOSO;" ERROR "£PFEERKCI?S5SOTPOP iFOR D= 
i TO SOOINEXT D$iGOTO 200 

1999 REM SCREEN SAVE ROUTINE 





2020 MDsPEEKCB20O$S$COLISPEEKCZ0BO)SCOLZZSPFEEKCZU9ÓOSCOLSZSPEERC/T10)SCOLASPEERCII2) 
2030 ? CHRS$OI258);"ENTER FILENAME FOR SCREEN TO SAVE"E? " i.e. ~em DEFTLENAME.EAT 
eee TS ENE UY TILS 

2050 IF FILS$COL,22z2"Di" AND FILEé¢1,2)22"C2" THEN 2030 

2060 OFEN #18, 0 FILE | 

2070 ? $1;MD:Q$;COL1;:Q$;COL25$0$:200L3;0$:2COL4 

2080 SCREEN=USK(14640,1,RECADR,RECLEN) 

2090 CLOSE +I GOTO 240 

2799 REM CHANGE COLOR FLAG 

3000 IF F=0 THEN Fzi:FO0K D=1 TO LOOSNEXT DS RETURN 

3010 IF F=1 THEN F<0¢FOR Dzi TO 1002NEXT DI RETURN 

3100 ? CHR$C125)$3"ENTER NUMBER TO BE FOKED TO BACKGROUNDCOLOR REGISTERSCOLORX16t 
LUMINANCE. "INPUT COLOR 

3200 FOKE 710,COLORSGOTO 240 

30000 FOR ADDRESS=16346 TO 16983; READ CODE POKE ADDRKESS,CODESNEXT ADDRESS 

30010 DATA 1460,7,208,2,160,11,104,201,3,240,4,169,464,208,42,104,104,10,10,10,10, 
170,104,157,69,3,104,157,68,3 | | j 

30020 DATA 104,157,73,3,104,157,72,3,15952,197,66,3,32,06,228,1909,67,3,430,7,169,0, 
30030 BATA 185,0 

30040. RETURN 
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Flease submit articles camera ready, typed 
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Subscriptions ( which include Group y 3 
membership ) are $12 per year, Persons who ~ 
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PROBLEM HOTLINE 


EVENING CONTACT PHONE NUMBER SPECIALTY 


MONDAY Robin Ziealer 408-438-6879 FORTH and Assembly 
TUESDAY Chris McAfee 408-758-8442 Harware 
WEDNESDAY John Crane 408-268-7317 BASIC and FORTH 
THURSDAY Paul Conrad 408-226-7676 BASIC 

FRIDAY Skip Inskeep 408-251-5517 FORTH 

SATURDAY Bob Burkhalter 408-856-1893 Disk I/O 

SUNDAY Hans Hansen 415-490-0175 DOSI & II 


Please call only between 7 P.M, and ? P.M. c on the night the individual 
is listed as being on call. If you can't aet an answer try one 
of the club officers, | 1 
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